<?php
// Copyright 2020 Catchpoint Systems Inc.
// Use of this source code is governed by the Polyform Shield 1.0.0 license that can be
// found in the LICENSE.md file.
chdir ('..');
include 'common.inc';
?>
<!DOCTYPE html>
<html>
    <head>
        <title>WebPageTest - Install Check</title>
        <meta http-equiv="charset" content="iso-8859-1">
        <meta name="description" content="Installation check for WebPageTest">
        <meta name="author" content="Patrick Meenan">
        <meta name="robots" content="noindex,nofollow" />
        <style type="text/css">
        body {
            background-color: #fff;
        }
        ul {
            list-style: none;
            padding:0 2em;
            margin:0;
        }
        li.pass {
            background:url("../images/check.png") no-repeat 0 0;
            padding-left: 20px;
        }
        li.fail {
            background:url("../images/error.png") no-repeat 0 0;
            padding-left: 20px;
        }
        li.warn {
            background:url("../images/warning.png") no-repeat 0 0;
            padding-left: 20px;
        }
        span.pass {
            color: #008600;
            font-weight: bold;
        }
        span.fail {
            color: #a30000;
            font-weight: bold;
        }
        span.warn {
            color: #d4aa01;
            font-weight: bold;
        }
        </style>
    </head>
    <body>
        <h1>WebPageTest <?php echo VER_WEBPAGETEST; ?> Installation Check</h1>
        <h2>PHP</h2><ul>
        <?php CheckPHP(); ?>
        </ul><h2>System Utilities</h2><ul>
        <?php CheckUtils(); ?>
      </ul><h2>Misc.</h2><ul>
        </ul><h2>Filesystem</h2><ul>
        <?php CheckFilesystem(); ?>
        </ul><h2>Test Locations</h2><ul>
        <?php CheckLocations(); ?>
        </ul>
        <?php
          //phpinfo();
        ?>
    </body>
</html>
<?php
/*-----------------------------------------------------------------------------
-----------------------------------------------------------------------------*/
function ShowCheck($label, $pass, $required = true, $value = null) {
    if ($pass) {
        $str = 'pass';
    } elseif ($required) {
        $str = 'fail';
    } else {
        $str = 'warn';
    }
    if (!isset($value)) {
        if ($pass) {
            $value = 'yes';
        } else {
            $value = 'NO';
        }
    }
    echo "<li class=\"$str\">$label: <span class=\"$str\">$value</span>";
    if (!$pass and !$required) {
        echo ' (optional)';
    }
    echo "</li>";
}

/*-----------------------------------------------------------------------------
-----------------------------------------------------------------------------*/
function CheckPHP() {
    ShowCheck('PHP version at least 5.3', phpversion() >= 5.3, true, phpversion());
    ShowCheck('GD module installed', extension_loaded('gd'));
    ShowCheck('FreeType enabled for GD (required for video rendering)', CheckFreeType(), false);
    ShowCheck('zip module installed', extension_loaded('zip'));
    ShowCheck('zlib module installed', extension_loaded('zlib'));
    ShowCheck('mbstring available', function_exists('mb_substr'));
    ShowCheck('curl module installed', extension_loaded('curl'), false);
    ShowCheck('php.ini allow_url_fopen enabled', ini_get('allow_url_fopen'), true);
    ShowCheck('APC installed', extension_loaded('apc') || extension_loaded('apcu'), false);
    ShowCheck('SQLite installed (for editable test labels)', class_exists("SQLite3"), false);
    ShowCheck('php.ini upload_max_filesize >= 100MB', return_bytes(ini_get('upload_max_filesize')) > 100000000, false, ini_get('upload_max_filesize'));
    ShowCheck('php.ini post_max_size >= 100MB', return_bytes(ini_get('post_max_size')) > 100000000, false, ini_get('post_max_size'));
    ShowCheck('php.ini memory_limit > 256MB or -1 (disabled)', return_bytes(ini_get('memory_limit')) > 256000000 || ini_get('memory_limit') == -1, false, ini_get('memory_limit'));
}

function CheckUtils() {
  ShowCheck('ffmpeg installed with --enable-libx264 (required for video)', CheckFfmpeg());
  ShowCheck('jpegtran installed (required for JPEG analysis)', CheckJpegTran(), false);
  ShowCheck('exiftool installed (required for JPEG analysis)', CheckExifTool(), false);
  $beanstalk = GetSetting('beanstalkd');
  if ($beanstalk)
      ShowCheck("beanstalkd responding on $beanstalk (configured in settings.ini)", CheckBeanstalkd());
}

/*-----------------------------------------------------------------------------
-----------------------------------------------------------------------------*/
function CheckFilesystem() {
    ShowCheck('{docroot}/tmp writable', IsWritable('tmp'));
    ShowCheck('{docroot}/dat writable', IsWritable('dat'));
    ShowCheck('{docroot}/results writable', IsWritable('results'));
    ShowCheck('{docroot}/work/jobs writable', IsWritable('work/jobs'));
    ShowCheck('{docroot}/logs writable', IsWritable('logs'));
    if ('Linux' == PHP_OS) {
        ShowCheck('{docroot}/tmp on tmpfs', IsWPTTmpOnTmpfs(), false);
    }
}

/*-----------------------------------------------------------------------------
-----------------------------------------------------------------------------*/
function IsWPTTmpOnTmpfs() {
    $marker = getcwd() . "/tmp";
    exec('mount -l -t tmpfs', $lines);
    foreach ($lines as $line) {
	if (0 === strpos($line, "tmpfs on $marker")) {
            return true;
        }
    }

    return false;
}

/*-----------------------------------------------------------------------------
-----------------------------------------------------------------------------*/
function CheckLocations() {
    $locations = LoadLocationsIni();
    $out = '';
    foreach($locations['locations'] as $id => $location) {
        if (is_numeric($id)) {
            $info = GetInstallLocationInfo($locations, $location);
            $out .= "<li class=\"{$info['state']}\">{$info['label']}";
            if (count($info['locations'])) {
                $out .= "<ul>";
                foreach($info['locations'] as $loc_name => $loc) {
                    $out .= "<li class=\"{$loc['state']}\">{$loc['label']}";
                    $out .= '</li>';
                }
                $out .= "</ul>";
            }
            $out .= "</li>";
        }
    }
    echo $out;
}

/*-----------------------------------------------------------------------------
-----------------------------------------------------------------------------*/
function GetInstallLocationInfo(&$locations, $location) {
    $info = array('state' => 'pass', 'label' => "$location : ", 'locations' => array());
    if (array_key_exists($location, $locations)) {
        if (array_key_exists('label', $locations[$location])) {
            $info['label'] .= $locations[$location]['label'];
        } else {
            $info['label'] .= '<span class="fail">Label Missing</span>';
            $info['locations'][$loc_name]['state'] = 'fail';
            $info['state'] = 'fail';
        }
        foreach($locations[$location] as $id => $loc_name) {
            if (is_numeric($id)) {
                $info['locations'][$loc_name] = array('state' => 'pass', 'label' => "$loc_name : ");
                if (array_key_exists($loc_name, $locations)) {
                    if (array_key_exists('label', $locations[$loc_name])) {
                        $info['locations'][$loc_name]['label'] .= $locations[$loc_name]['label'];
                    } else {
                        $info['locations'][$loc_name]['label'] .= '<span class="fail">Label Missing</span>';
                        $info['locations'][$loc_name]['state'] = 'fail';
                        $info['state'] = 'fail';
                    }
                    $info['locations'][$loc_name]['label'] .= ' - ';
                    $testerCount = 0;
                    $elapsedCheck = -1;
                    $testers = GetTesters($loc_name);
                    if (isset($testers['elapsed']))
                      $elapsedCheck = $testers['elapsed'];
                    if (isset($testers) && is_array($testers) && isset($testers['testers']))
                      $testerCount = count($testers['testers']);
                    if ($testerCount && $elapsedCheck >= 0) {
                        if ($elapsedCheck < 60) {
                            $info['locations'][$loc_name]['label'] .= "<span class=\"pass\">$testerCount agents connected</span>";
                        } else {
                            $info['locations'][$loc_name]['label'] .= "<span class=\"fail\">$elapsedCheck minutes since last agent connected</span>";
                            $info['locations'][$loc_name]['state'] = 'fail';
                            $info['state'] = 'fail';
                        }
                    } else {
                        $info['locations'][$loc_name]['label'] .= '<span class="fail">No Agents Connected</span>';
                        $info['locations'][$loc_name]['state'] = 'fail';
                        $info['state'] = 'fail';
                    }
                } else {
                    $info['locations'][$loc_name]['label'] .= '<span class="fail">Definition Missing</span>';
                    $info['locations'][$loc_name]['state'] = 'fail';
                    $info['state'] = 'fail';
                }
            }
        }
    } else {
        $info['label'] .= '<span class="fail">Definition Missing</span>';
        $info['state'] = 'fail';
    }
    return $info;
}

/*-----------------------------------------------------------------------------
-----------------------------------------------------------------------------*/
function IsWritable($dir) {
    $ok = false;
    $dir = './' . $dir;
    if (!is_dir($dir)) {
        mkdir($dir, 0777, true);
    }
    if (is_dir($dir)) {
        $file = "$dir/install_check.dat";
        if (file_put_contents($file, 'wpt')) {
            if (file_get_contents($file) == 'wpt') {
                $ok = true;
            }
        }
        unlink($file);
    }
    return $ok;
}

/*-----------------------------------------------------------------------------
-----------------------------------------------------------------------------*/
function return_bytes($val) {
    if (!isset($val)) {
        $val = '0';
    }
    $val = trim($val);
    switch (strtolower(substr($val, -1)))
    {
        case 'm': $val = (int)substr($val, 0, -1) * 1048576; break;
        case 'k': $val = (int)substr($val, 0, -1) * 1024; break;
        case 'g': $val = (int)substr($val, 0, -1) * 1073741824; break;
        case 'b':
            switch (strtolower(substr($val, -2, 1)))
            {
                case 'm': $val = (int)substr($val, 0, -2) * 1048576; break;
                case 'k': $val = (int)substr($val, 0, -2) * 1024; break;
                case 'g': $val = (int)substr($val, 0, -2) * 1073741824; break;
                default : break;
            } break;
        default: break;
    }

    return $val;
}

/**
* See if we can talk to beanstalkd
*
*/
function CheckBeanstalkd() {
    $ret = false;
    require_once('./lib/beanstalkd/pheanstalk_init.php');
    $pheanstalk = new Pheanstalk_Pheanstalk(GetSetting('beanstalkd'));
    if ($pheanstalk->getConnection()->isServiceListening()) {
        $id = $pheanstalk->putInTube('wpt.installtest', "test");
        $jobStats = $pheanstalk->statsJob($id);
        $tubeStats = $pheanstalk->statsTube('wpt.installtest');
        $job = $pheanstalk->reserveFromTube('wpt.installtest', 0);
        if ($job !== false && $job->getData() == 'test')
            $ret = true;
        $pheanstalk->delete($job);
    }
    return $ret;
}

/**
* Check to make sure ffmpeg is installed and working
*
*/
function CheckFfmpeg() {
    $ret = false;
    $x264 = false;
    $command = "ffmpeg -version";
    $retStr = exec($command, $output, $result);
    if (count($output)) {
        foreach($output as $line) {
            if (stripos($line, 'ffmpeg ') !== false)
                $ret = true;
            if (stripos($line, '--enable-libx264') !== false)
                $x264 = true;
        }
    }

    return $ret && $x264;
}

function CheckJpegTran() {
    $ret = false;
    $command = "jpegtran -h";
    $retStr = exec($command, $output, $result);
    if ($result == 1)
      $ret = true;
    return $ret;
}

function CheckExifTool() {
    $ret = false;
    $command = "exiftool -ver";
    $retStr = exec($command, $output, $result);
    if ($result == 0)
      $ret = true;
    return $ret;
}

function CheckFreeType() {
  $ret = false;
  if (extension_loaded('gd')) {
    $gdinfo = gd_info();
    if(isset($gdinfo['FreeType Support']) && $gdinfo['FreeType Support'])
      $ret = true;
  }
  return $ret;
}
?>
